inherited FRotinaGeraRPS: TFRotinaGeraRPS
  Left = 357
  Top = 276
  Caption = 'Gera RPS (Recibo Provis'#243'rio de Servi'#231'o)'
  OldCreateOrder = True
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 16
  inherited panel2: TPanel
    inherited BtnExec: TBitBtn
      OnClick = BtnExecClick
    end
  end
  inherited pnBg: TPanel
    object Label5: TLabel
      Left = 6
      Top = 5
      Width = 40
      Height = 16
      Caption = 'C'#243'digo'
    end
    object Label1: TLabel
      Left = 88
      Top = 5
      Width = 97
      Height = 16
      Caption = 'Data de Inclus'#227'o'
    end
    object Label2: TLabel
      Left = 6
      Top = 150
      Width = 143
      Height = 16
      Caption = 'Caminho / Nome Arquivo'
    end
    object ECodigoNF: TEdit
      Left = 6
      Top = 23
      Width = 67
      Height = 22
      TabOrder = 0
    end
    object dtCadastroNF: TDateEdit
      Left = 88
      Top = 23
      Width = 97
      Height = 22
      NumGlyphs = 2
      TabOrder = 1
    end
    object edCaminho: TDirectoryEdit
      Left = 6
      Top = 168
      Width = 571
      Height = 21
      NumGlyphs = 1
      TabOrder = 2
      Text = 'edCaminho'
    end
  end
  object QryNFSe: TQuery
    DatabaseName = 'base'
    SQL.Strings = (
      'SELECT'
      'NF_COBRANCA,'
      'EMP_INSCMUNICIPAL,'
      'NF_DTEMISSAO_RPS,'
      'NF_SERIE_RPS,'
      'NF_CODIGO,'
      'NF_NRPS,'
      'ITENSNF_SERVICO,'
      'CLI_TIPOCLIENTE,'
      'CLI_IDENTENDNF,'
      'CLI_TIPO_ENDERECO_CORRESP,'
      'CLI_ENDERECOCORRESP,'
      'CLI_NUMERO_ENDERECO_CORRESP,'
      'CLI_BAIRROCORRESP,'
      'CLI_CIDADECORRESP,'
      'CLI_ESTADOCORRESP,'
      'CLI_CEPCORRESP,'
      'CLI_TIPO_ENDERECO_PEDIDO,'
      'CLI_ENDERECOPEDIDO,'
      'CLI_NUMERO_ENDERECO_CORRESP,'
      'CLI_BAIRROPEDIDO,'
      'CLI_CIDADEPEDIDO,'
      'CLI_ESTADOPEDIDO,'
      'CLI_CEPPEDIDO,'
      'CLI_CPFCNPJ,'
      'EMP_CNAE,'
      'CLI_INSCMUNICIPAL,'
      'NF_PERCISS,'
      'CLI_INSCESTADUAL,'
      'NF_RETEMISS,'
      'NF_SITUACAO_RPS,'
      'ITENSNF_VALORTOTAL,'
      'CLI_RAZAO,'
      'CLI_EMAIL,'
      'NF_VALORCOFINS,'
      'NF_VALORCSLL,'
      'NF_VALORINSS,'
      'NF_VALORIRRF,'
      'NF_VALORPIS,'
      'NF_TIPO_RPS,'
      'NF_SITUACAO_RPS,'
      'ITENSNF_VALORTOTAL,'
      'NF_RETEMISS'
      'FROM'
      '  NOTAFISCALVENDA'
      
        '  INNER JOIN EMPRESA ON (NOTAFISCALVENDA.CODIGOEMPRESA = EMPRESA' +
        '.EMP_CODIGO)'
      
        '  INNER JOIN CLIENTE ON (NOTAFISCALVENDA.NF_CLIENTE = CLIENTE.CL' +
        'I_CODIGO)'
      
        '  INNER JOIN ITENSNOTAFISCALVENDA ON (ITENSNOTAFISCALVENDA.ITENS' +
        'NF_NOTAFISCAL = NOTAFISCALVENDA.NF_CODIGO )'
      
        '                                 AND (ITENSNOTAFISCALVENDA.ITENS' +
        'NF_SERVICO IS NOT NULL)'
      
        '  INNER JOIN PRODUTO ON (ITENSNOTAFISCALVENDA.ITENSNF_PRODUTO = ' +
        'PRODUTO.PROD_CODIGO)'
      'WHERE'
      
        '  (NOTAFISCALVENDA.EXCLUIDO    <> '#39'S'#39' OR NOTAFISCALVENDA.EXCLUID' +
        'O IS NULL) AND'
      '  (NOTAFISCALVENDA.NF_SITUACAO <> 2) AND'
      '  (NOTAFISCALVENDA.CODIGOEMPRESA = 1)'
      '   AND (NOTAFISCALVENDA.NF_CODIGO = 13)'
      'ORDER BY'
      '  NF_CODIGO')
    Left = 496
    Top = 88
    object QryNFSeNF_COBRANCA: TIntegerField
      FieldName = 'NF_COBRANCA'
    end
    object QryNFSeEMP_INSCMUNICIPAL: TStringField
      FieldName = 'EMP_INSCMUNICIPAL'
    end
    object QryNFSeNF_DTEMISSAO_RPS: TDateTimeField
      FieldName = 'NF_DTEMISSAO_RPS'
    end
    object QryNFSeNF_SERIE_RPS: TStringField
      FieldName = 'NF_SERIE_RPS'
      Size = 5
    end
    object QryNFSeNF_CODIGO: TIntegerField
      FieldName = 'NF_CODIGO'
    end
    object QryNFSeNF_NRPS: TIntegerField
      FieldName = 'NF_NRPS'
    end
    object QryNFSeITENSNF_SERVICO: TMemoField
      FieldName = 'ITENSNF_SERVICO'
      BlobType = ftMemo
      Size = 1000
    end
    object QryNFSeCLI_TIPOCLIENTE: TStringField
      FieldName = 'CLI_TIPOCLIENTE'
      Size = 1
    end
    object QryNFSeCLI_IDENTENDNF: TStringField
      FieldName = 'CLI_IDENTENDNF'
      Size = 2
    end
    object QryNFSeCLI_TIPO_ENDERECO_CORRESP: TStringField
      FieldName = 'CLI_TIPO_ENDERECO_CORRESP'
      FixedChar = True
      Size = 3
    end
    object QryNFSeCLI_ENDERECOCORRESP: TStringField
      FieldName = 'CLI_ENDERECOCORRESP'
      Size = 60
    end
    object QryNFSeCLI_NUMERO_ENDERECO_CORRESP: TStringField
      FieldName = 'CLI_NUMERO_ENDERECO_CORRESP'
      Size = 10
    end
    object QryNFSeCLI_BAIRROCORRESP: TStringField
      FieldName = 'CLI_BAIRROCORRESP'
      Size = 60
    end
    object QryNFSeCLI_CIDADECORRESP: TStringField
      FieldName = 'CLI_CIDADECORRESP'
      Size = 60
    end
    object QryNFSeCLI_ESTADOCORRESP: TStringField
      FieldName = 'CLI_ESTADOCORRESP'
      Size = 2
    end
    object QryNFSeCLI_CEPCORRESP: TStringField
      FieldName = 'CLI_CEPCORRESP'
      Size = 10
    end
    object QryNFSeCLI_TIPO_ENDERECO_PEDIDO: TStringField
      FieldName = 'CLI_TIPO_ENDERECO_PEDIDO'
      FixedChar = True
      Size = 3
    end
    object QryNFSeCLI_ENDERECOPEDIDO: TStringField
      FieldName = 'CLI_ENDERECOPEDIDO'
      Size = 60
    end
    object QryNFSeCLI_NUMERO_ENDERECO_CORRESP_1: TStringField
      FieldName = 'CLI_NUMERO_ENDERECO_CORRESP_1'
      Size = 10
    end
    object QryNFSeCLI_BAIRROPEDIDO: TStringField
      FieldName = 'CLI_BAIRROPEDIDO'
      Size = 60
    end
    object QryNFSeCLI_CIDADEPEDIDO: TStringField
      FieldName = 'CLI_CIDADEPEDIDO'
      Size = 60
    end
    object QryNFSeCLI_ESTADOPEDIDO: TStringField
      FieldName = 'CLI_ESTADOPEDIDO'
      Size = 2
    end
    object QryNFSeCLI_CEPPEDIDO: TStringField
      FieldName = 'CLI_CEPPEDIDO'
      Size = 10
    end
    object QryNFSeCLI_CPFCNPJ: TStringField
      FieldName = 'CLI_CPFCNPJ'
    end
    object QryNFSeEMP_CNAE: TStringField
      FieldName = 'EMP_CNAE'
      FixedChar = True
      Size = 8
    end
    object QryNFSeCLI_INSCMUNICIPAL: TStringField
      FieldName = 'CLI_INSCMUNICIPAL'
    end
    object QryNFSeNF_PERCISS: TFloatField
      FieldName = 'NF_PERCISS'
    end
    object QryNFSeCLI_INSCESTADUAL: TStringField
      FieldName = 'CLI_INSCESTADUAL'
    end
    object QryNFSeNF_RETEMISS: TSmallintField
      FieldName = 'NF_RETEMISS'
    end
    object QryNFSeNF_SITUACAO_RPS: TStringField
      FieldName = 'NF_SITUACAO_RPS'
      FixedChar = True
      Size = 1
    end
    object QryNFSeITENSNF_VALORTOTAL: TFloatField
      FieldName = 'ITENSNF_VALORTOTAL'
    end
    object QryNFSeCLI_RAZAO: TStringField
      FieldName = 'CLI_RAZAO'
      Size = 60
    end
    object QryNFSeCLI_EMAIL: TStringField
      FieldName = 'CLI_EMAIL'
      Size = 62
    end
    object QryNFSeNF_VALORCOFINS: TFloatField
      FieldName = 'NF_VALORCOFINS'
    end
    object QryNFSeNF_VALORCSLL: TFloatField
      FieldName = 'NF_VALORCSLL'
    end
    object QryNFSeNF_VALORINSS: TFloatField
      FieldName = 'NF_VALORINSS'
    end
    object QryNFSeNF_VALORIRRF: TFloatField
      FieldName = 'NF_VALORIRRF'
    end
    object QryNFSeNF_VALORPIS: TFloatField
      FieldName = 'NF_VALORPIS'
    end
    object QryNFSeNF_TIPO_RPS: TStringField
      FieldName = 'NF_TIPO_RPS'
      FixedChar = True
      Size = 1
    end
    object QryNFSeNF_SITUACAO_RPS_1: TStringField
      FieldName = 'NF_SITUACAO_RPS_1'
      FixedChar = True
      Size = 1
    end
    object QryNFSeNF_RETEMISS_1: TSmallintField
      FieldName = 'NF_RETEMISS_1'
    end
  end
  object DataSource1: TDataSource
    DataSet = QryNFSe
    Left = 192
    Top = 88
  end
end
